home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / pascal / tch_tpas.zip / PROG15A.PAS < prev    next >
Pascal/Delphi Source File  |  1986-04-05  |  384b  |  16 lines
  1. PROGRAM PROG15A;
  2. {$U+    Copyright  (C), 1985 by Lyle Faurot.  All rights reserved.
  3.  
  4.      New Topics:  Cursor location
  5.  
  6. VAR
  7.   X, Y  : Integer;
  8.  
  9. BEGIN
  10.   ClrScr;
  11.   Write('Enter X and Y: ');
  12.   ReadLn(X, Y);
  13.   GotoXY(X, Y);
  14.   WriteLn(X,' ',Y);
  15. END.
  16.